100 REM <RUN/STOP>-TASTE ABFRAGEN
110 POKE788,52:REM RUN/STOP SPERREN
120 DEF FN DEEK(X)=PEEK(X)+256*PEEK(X+1)
130 INPUT"LOW-BYTE DER GEWUENSCHTEN ADRESSE";A
140 PRINT""FN DEEK(A)
150 PRINT"NOCH EINMAL ? (J/N)"
160 WAIT198,1:GETZ$
170 IFASC(Z$)=3ORASC(Z$)=131THEN200
175 REM 'IF ASC(Z$)=3' IST DER TEST AUF <RUN/STOP>
180 IFZ$<>"J"THENEND
190 GOTO130
200 PRINT"AHA, SCHON WIEDER RUN/STOP[146] GEDRUECKT!":GOTO130